home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 30
/
Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso
/
Aminet
/
gfx
/
misc
/
SvII-6.lha
/
SViewII
/
SuperViewLibrary
/
SQ-Operators
/
Install_SQOp
next >
Wrap
Text File
|
1999-02-20
|
2KB
|
68 lines
;
; $VER: Install_SQOp V20.1 (10.1.98)
; This is the Installer Script for Steve Quartly's operators
;
; Modified by © 1998 Dámaso D. Estévez :)
; ------------------------------------------------------
; English strings (default)
(set @app-name "SQ-Operators")
(set #msj1 "Installing CPInfo files to 'ENVARC:'...")
(set #msj2 "Library Path")
(set #msj3 "Installing svoperators to LIBS:svoperators ...")
(set #msj4 "SQ-Operators have been installed now.\nIf this was an Update, you should\nreboot your computer now.")
; Spanish strings
(if (= @language "español")
(
(set @app-name "'Operadores SQ'")
(set #msj1 "Instalando ficheros CPInfo en 'ENVARC:'...")
(set #msj2 "Seleccione el directorio donde está instalada la biblioteca 'superview.library'")
(set #msj3 "Instalando operadores de SuperView en ")
(set #msj4 "Los operadores SQ han sido instalados.\nSi se trata de una actualización,\ndeberá reiniciar su ordenador ahora.")
)
)
; ------------------------------------------------------
(makedir "ENV:SuperView-Library")
(makedir "ENVARC:SuperView-Library")
(copyfiles
(prompt #msj1)
(help @copyfiles-help)
(source "envarc")
(dest "ENVARC:")
(all)
)
(set svlibdir
(askdir
(prompt #msj2)
(help @askdir-help)
(newpath)
(default "LIBS:")
)
)
(set @default-dest svlibdir)
(set svoperatordir (tackon svlibdir "svoperators"))
(makedir svoperatordir)
(set #msj2 (cat #msj3 svlibdir "/svoperators..."))
(copyfiles
(prompt #msj3)
(help @copyfiles-help)
(source "libs/svoperators")
(dest (tackon svlibdir "svoperators"))
(pattern "#?")
(files)
)
(exit #msj4)